home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / umich / utils / gemfsc15.lzh / VDISRC15.LZH / VDIOUTP4.S < prev    next >
Text File  |  1990-06-29  |  1KB  |  37 lines
  1.  
  2. ;*========================================================================
  3. ;*
  4. ;* VDIFAST Public Domain VDI bindings.
  5. ;*
  6. ;*========================================================================
  7.           
  8.           .iif      !(^^macdef VContrl),.include  "vdimacro.s"
  9.           
  10. ;*************************************************************************
  11. ;*
  12. ;* Special v_gtext call to handle a single char at a time.
  13. ;*
  14. ;*************************************************************************
  15.  
  16. ;*------------------------------------------------------------------------
  17. ;* v_gchar - Output a single character of graphics text using v_gtext.
  18. ;*------------------------------------------------------------------------
  19.  
  20. _v_gchar::
  21.  
  22.           .cargs    #8,.handle.w,.x.w,.y.w,.char.w
  23.           link      a6,#0
  24.           
  25.           VContrl   #8,,#1,#1
  26.           
  27.           subq.l    #8,sp               ;* -> ptsout
  28.           pea       .x(a6)              ;* -> ptsin
  29.           pea       .char(a6)           ;* -> intin
  30.           pea       16(sp)              ;* -> contrl
  31.  
  32.           jmp       vdicall
  33.           
  34. ;         end of code.
  35.  
  36.  
  37.